BBS in a Box 12

home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 12 / BBS in a box XII-2.iso / Files II / Prog / B-C / CPEditText 1.2.sit / CPEditText 1.2 / CPEditText.asm < prev next >
MacBinary | 1993-10-03 | 6.8 KB | [TEXT/KAHL]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: CPEditText.asm
Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	freeCAD assembly `(other/freeCADAssembly)`	ext	Unsupported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, Sun Oct 3 01:00:00 1993, modified Sun Oct 3 01:00:00 1993, creator Think C, type ASCII, 6217 bytes "CPEditText.asm" , at 0x18c9 397 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[KAHL]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0e 43 50 45 64 69 74 | 54 65 78 74 2e 61 73 6d |..CPEdit|Text.asm|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 00 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 18 49 00 | 00 01 8d a8 d4 0c d0 a8 |......I.|........|
|00000060| d4 0c d0 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 30 c4 00 00 |........|....0...|
|00000080| 2f 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/*******|********|
|00000090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0d |********|*******.|
|000000d0| 20 43 50 45 64 69 74 54 | 65 78 74 2e 61 73 6d 0d | CPEditT|ext.asm.|
|000000e0| 09 09 0d 09 09 09 09 41 | 73 73 65 6d 62 6c 79 20 |.......A|ssembly |
|000000f0| 6c 61 6e 67 75 61 67 65 | 20 72 6f 75 74 69 6e 65 |language| routine|
|00000100| 73 20 66 6f 72 20 43 50 | 45 64 69 74 54 65 78 74 |s for CP|EditText|
|00000110| 20 31 2e 32 0d 09 0d 09 | 54 68 65 73 65 20 72 6f | 1.2....|These ro|
|00000120| 75 74 69 6e 65 73 20 61 | 72 65 20 6f 6e 6c 79 20 |utines a|re only |
|00000130| 6e 65 63 65 73 73 61 72 | 79 20 69 66 20 79 6f 75 |necessar|y if you|
|00000140| 20 61 72 65 20 63 6f 6d | 70 69 6c 69 6e 67 20 74 | are com|piling t|
|00000150| 68 65 20 54 43 4c 0d 09 | 77 69 74 68 20 74 68 65 |he TCL..|with the|
|00000160| 20 53 79 6d 61 6e 74 65 | 63 20 43 2b 2b 20 63 6f | Symante|c C++ co|
|00000170| 6d 70 69 6c 65 72 2e 20 | 20 49 66 20 79 6f 75 20 |mpiler. | If you |
|00000180| 61 72 65 20 75 73 69 6e | 67 20 54 48 49 4e 4b 20 |are usin|g THINK |
|00000190| 43 2c 20 79 6f 75 0d 09 | 64 6f 20 6e 6f 74 20 6e |C, you..|do not n|
|000001a0| 65 65 64 20 74 6f 20 69 | 6e 63 6c 75 64 65 20 74 |eed to i|nclude t|
|000001b0| 68 69 73 20 66 69 6c 65 | 20 69 6e 20 79 6f 75 72 |his file| in your|
|000001c0| 20 70 72 6f 6a 65 63 74 | 2e 0d 09 0d 09 43 6f 70 | project|.....Cop|
|000001d0| 79 72 69 67 68 74 20 a9 | 20 31 39 39 33 20 43 68 |yright .| 1993 Ch|
|000001e0| 72 69 73 74 6f 70 68 65 | 72 20 52 2e 20 57 79 73 |ristophe|r R. Wys|
|000001f0| 6f 63 6b 69 2e 20 20 41 | 6c 6c 20 72 69 67 68 74 |ocki.  A|ll right|
|00000200| 73 20 72 65 73 65 72 76 | 65 64 2e 0d 09 0d 20 2a |s reserv|ed.... *|
|00000210| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000220| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000230| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000240| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000250| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2f 0d 0d |********|*****/..|
|00000260| 23 69 6e 63 6c 75 64 65 | 20 22 43 50 45 64 69 74 |#include| "CPEdit|
|00000270| 54 65 78 74 58 2e 68 22 | 0d 0d 0d 2f 2a 2a 2a 2a |TextX.h"|.../****|
|00000280| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000290| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000002a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000002b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000002c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0d 20 41 73 6d 44 |********|**. AsmD|
|000002d0| 72 61 77 4c 69 6e 65 52 | 61 6e 67 65 0d 0d 09 09 |rawLineR|ange....|
|000002e0| 41 73 73 65 6d 62 6c 79 | 2d 6c 61 6e 67 75 61 67 |Assembly|-languag|
|000002f0| 65 20 72 6f 75 74 69 6e | 65 20 75 73 65 64 20 62 |e routin|e used b|
|00000300| 79 20 43 50 45 64 69 74 | 54 65 78 74 3a 3a 44 72 |y CPEdit|Text::Dr|
|00000310| 61 77 4c 69 6e 65 52 61 | 6e 67 65 2e 0d 20 2a 2a |awLineRa|nge.. **|
|00000320| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000330| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000340| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000350| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000360| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2f 0d 0d 76 |********|****/..v|
|00000370| 6f 69 64 09 41 73 6d 44 | 72 61 77 4c 69 6e 65 52 |oid.AsmD|rawLineR|
|00000380| 61 6e 67 65 28 0d 09 72 | 65 67 69 73 74 65 72 20 |ange(..r|egister |
|00000390| 50 74 72 09 74 65 78 74 | 50 2c 0d 09 72 65 67 69 |Ptr.text|P,..regi|
|000003a0| 73 74 65 72 20 73 68 6f | 72 74 09 6e 75 6d 43 68 |ster sho|rt.numCh|
|000003b0| 61 72 73 2c 0d 09 73 68 | 6f 72 74 09 09 09 74 61 |ars,..sh|ort...ta|
|000003c0| 62 57 69 64 74 68 2c 0d | 09 72 65 67 69 73 74 65 |bWidth,.|.registe|
|000003d0| 72 20 50 74 72 09 67 61 | 70 50 2c 0d 09 6c 6f 6e |r Ptr.ga|pP,..lon|
|000003e0| 67 09 09 09 67 61 70 4c | 65 6e 67 74 68 2c 0d 09 |g...gapL|ength,..|
|000003f0| 50 6f 69 6e 74 09 09 09 | 73 74 61 72 74 50 74 2c |Point...|startPt,|
|00000400| 0d 09 42 6f 6f 6c 65 61 | 6e 09 09 09 73 68 6f 77 |..Boolea|n...show|
|00000410| 49 6e 76 69 73 69 62 6c | 65 73 29 0d 7b 0d 09 72 |Invisibl|es).{..r|
|00000420| 65 67 69 73 74 65 72 20 | 63 68 61 72 09 74 61 62 |egister |char.tab|
|00000430| 3b 0d 09 72 65 67 69 73 | 74 65 72 20 73 68 6f 72 |;..regis|ter shor|
|00000440| 74 09 69 6e 64 65 78 3b | 0d 09 50 6f 69 6e 74 09 |t.index;|..Point.|
|00000450| 09 09 70 65 6e 50 74 3b | 0d 09 0d 09 61 73 6d 20 |..penPt;|....asm |
|00000460| 7b 0d 09 09 63 6c 72 2e | 77 09 69 6e 64 65 78 09 |{...clr.|w.index.|
|00000470| 09 09 09 09 3b 20 72 65 | 73 65 74 20 69 6e 64 65 |....; re|set inde|
|00000480| 78 0d 09 09 6d 6f 76 65 | 2e 62 09 23 6b 54 61 62 |x...move|.b.#kTab|
|00000490| 2c 74 61 62 09 09 09 09 | 3b 20 6b 65 65 70 20 74 |,tab....|; keep t|
|000004a0| 61 62 20 63 68 61 72 61 | 63 74 65 72 20 69 6e 20 |ab chara|cter in |
|000004b0| 72 65 67 69 73 74 65 72 | 20 66 6f 72 20 73 70 65 |register| for spe|
|000004c0| 65 64 0d 09 09 0d 09 40 | 4c 6f 6f 70 3a 0d 09 09 |ed.....@|Loop:...|
|000004d0| 63 6d 70 2e 77 09 6e 75 | 6d 43 68 61 72 73 2c 69 |cmp.w.nu|mChars,i|
|000004e0| 6e 64 65 78 09 09 09 3b | 20 68 61 76 65 20 77 65 |ndex...;| have we|
|000004f0| 20 64 72 61 77 6e 20 61 | 6c 6c 20 74 68 65 20 74 | drawn a|ll the t|
|00000500| 65 78 74 3f 0d 09 09 62 | 67 65 2e 73 09 40 44 6f |ext?...b|ge.s.@Do|
|00000510| 6e 65 09 09 09 09 09 3b | 20 62 72 61 6e 63 68 20 |ne.....;| branch |
|00000520| 69 66 20 77 65 20 68 61 | 76 65 0d 09 09 63 6d 70 |if we ha|ve...cmp|
|00000530| 61 2e 6c 09 67 61 70 50 | 2c 74 65 78 74 50 09 09 |a.l.gapP|,textP..|
|00000540| 09 09 3b 20 61 72 65 20 | 77 65 20 61 74 20 74 68 |..; are |we at th|
|00000550| 65 20 67 61 70 3f 0d 09 | 09 62 6e 65 2e 73 09 40 |e gap?..|.bne.s.@|
|00000560| 4e 6f 74 41 74 47 61 70 | 09 09 09 09 3b 20 62 72 |NotAtGap|....; br|
|00000570| 61 6e 63 68 20 69 66 20 | 6e 6f 74 0d 09 09 0d 09 |anch if |not.....|
|00000580| 40 41 74 47 61 70 3a 0d | 09 09 62 73 72 2e 73 09 |@AtGap:.|..bsr.s.|
|00000590| 40 44 72 61 77 54 65 78 | 74 09 09 09 09 3b 20 65 |@DrawTex|t....; e|
|000005a0| 6c 73 65 20 64 72 61 77 | 20 74 68 65 20 74 65 78 |lse draw| the tex|
|000005b0| 74 20 74 6f 20 74 68 65 | 20 6c 65 66 74 20 6f 66 |t to the| left of|
|000005c0| 20 74 68 65 20 67 61 70 | 0d 09 09 61 64 64 61 2e | the gap|...adda.|
|000005d0| 6c 09 67 61 70 4c 65 6e | 67 74 68 2c 74 65 78 74 |l.gapLen|gth,text|
|000005e0| 50 09 09 09 3b 20 61 6e | 64 20 73 6b 69 70 20 6f |P...; an|d skip o|
|000005f0| 76 65 72 20 74 68 65 20 | 67 61 70 0d 09 09 0d 09 |ver the |gap.....|
|00000600| 40 4e 6f 74 41 74 47 61 | 70 3a 0d 09 09 61 64 64 |@NotAtGa|p:...add|
|00000610| 71 2e 77 09 23 31 2c 69 | 6e 64 65 78 09 09 09 09 |q.w.#1,i|ndex....|
|00000620| 3b 20 65 6c 73 65 20 62 | 75 6d 70 20 74 68 65 20 |; else b|ump the |
|00000630| 69 6e 64 65 78 09 09 0d | 09 09 63 6d 70 2e 62 09 |index...|..cmp.b.|
|00000640| 28 74 65 78 74 50 29 2b | 2c 74 61 62 09 09 09 3b |(textP)+|,tab...;|
|00000650| 20 69 73 20 63 68 61 72 | 61 63 74 65 72 20 66 72 | is char|acter fr|
|00000660| 6f 6d 20 74 65 78 74 20 | 61 20 74 61 62 3f 0d 09 |om text |a tab?..|
|00000670| 09 62 6e 65 2e 73 09 40 | 4c 6f 6f 70 09 09 09 09 |.bne.s.@|Loop....|
|00000680| 09 3b 20 6c 6f 6f 70 20 | 69 66 20 6e 6f 74 0d 09 |.; loop |if not..|
|00000690| 09 0d 09 40 49 73 54 61 | 62 3a 0d 09 09 6d 6f 76 |...@IsTa|b:...mov|
|000006a0| 65 71 09 23 31 2c 64 30 | 09 09 09 09 09 3b 20 73 |eq.#1,d0|.....; s|
|000006b0| 74 69 63 6b 20 31 20 69 | 6e 20 64 30 20 66 6f 72 |tick 1 i|n d0 for|
|000006c0| 20 61 20 6c 69 74 74 6c | 65 20 65 78 74 72 61 20 | a littl|e extra |
|000006d0| 73 70 65 65 64 0d 09 09 | 73 75 62 2e 77 09 64 30 |speed...|sub.w.d0|
|000006e0| 2c 74 65 78 74 50 09 09 | 09 09 3b 20 64 65 63 72 |,textP..|..; decr|
|000006f0| 65 6d 65 6e 74 20 70 74 | 72 20 74 6f 20 74 65 78 |ement pt|r to tex|
|00000700| 74 0d 09 09 73 75 62 2e | 77 09 64 30 2c 69 6e 64 |t...sub.|w.d0,ind|
|00000710| 65 78 09 09 09 09 3b 20 | 64 65 63 72 65 6d 65 6e |ex....; |decremen|
|00000720| 74 20 23 20 6f 66 20 63 | 68 61 72 61 63 74 65 72 |t # of c|haracter|
|00000730| 73 20 74 6f 20 64 72 61 | 77 0d 09 09 62 73 72 2e |s to dra|w...bsr.|
|00000740| 73 09 40 44 72 61 77 54 | 65 78 74 09 09 09 09 3b |s.@DrawT|ext....;|
|00000750| 20 64 72 61 77 20 74 68 | 65 20 74 65 78 74 20 74 | draw th|e text t|
|00000760| 6f 20 74 68 65 20 6c 65 | 66 74 20 6f 66 20 74 68 |o the le|ft of th|
|00000770| 65 20 74 61 62 0d 09 09 | 0d 09 09 6d 6f 76 65 61 |e tab...|...movea|
|00000780| 2e 6c 09 74 68 65 50 6f | 72 74 2c 61 30 09 09 09 |.l.thePo|rt,a0...|
|00000790| 09 3b 20 67 65 74 20 63 | 75 72 72 65 6e 74 20 47 |.; get c|urrent G|
|000007a0| 72 61 66 50 74 72 0d 09 | 09 6d 6f 76 65 2e 6c 09 |rafPtr..|.move.l.|
|000007b0| 4f 46 46 53 45 54 28 47 | 72 61 66 50 6f 72 74 2c |OFFSET(G|rafPort,|
|000007c0| 70 6e 4c 6f 63 29 28 61 | 30 29 2c 70 65 6e 50 74 |pnLoc)(a|0),penPt|
|000007d0| 20 3b 20 67 65 74 20 70 | 65 6e 20 6c 6f 63 61 74 | ; get p|en locat|
|000007e0| 69 6f 6e 0d 09 09 0d 09 | 09 74 73 74 2e 62 09 73 |ion.....|.tst.b.s|
|000007f0| 68 6f 77 49 6e 76 69 73 | 69 62 6c 65 73 09 09 09 |howInvis|ibles...|
|00000800| 3b 20 61 72 65 20 77 65 | 20 64 69 73 70 6c 61 79 |; are we| display|
|00000810| 69 6e 67 20 69 6e 76 69 | 73 69 62 6c 65 20 63 68 |ing invi|sible ch|
|00000820| 61 72 61 63 74 65 72 73 | 3f 0d 09 09 62 65 71 2e |aracters|?...beq.|
|00000830| 73 09 40 4e 6f 49 6e 76 | 69 73 31 09 09 09 09 3b |s.@NoInv|is1....;|
|00000840| 20 62 72 61 6e 63 68 20 | 69 66 20 6e 6f 74 0d 09 | branch |if not..|
|00000850| 09 6d 6f 76 65 2e 77 09 | 23 6b 49 6e 76 69 73 54 |.move.w.|#kInvisT|
|00000860| 61 62 2c 2d 28 61 37 29 | 09 09 3b 20 65 6c 73 65 |ab,-(a7)|..; else|
|00000870| 20 70 75 73 68 20 69 6e | 76 69 73 69 62 6c 65 20 | push in|visible |
|00000880| 74 61 62 20 63 68 61 72 | 61 63 74 65 72 0d 09 09 |tab char|acter...|
|00000890| 5f 44 72 61 77 43 68 61 | 72 09 09 09 09 09 09 3b |_DrawCha|r......;|
|000008a0| 20 61 6e 64 20 64 72 61 | 77 20 69 74 0d 09 09 0d | and dra|w it....|
|000008b0| 09 40 4e 6f 49 6e 76 69 | 73 31 3a 0d 09 09 6d 6f |.@NoInvi|s1:...mo|
|000008c0| 76 65 71 09 23 30 2c 64 | 30 09 09 09 09 09 3b 20 |veq.#0,d|0.....; |
|000008d0| 63 6c 65 61 72 20 6f 75 | 74 20 61 6c 6c 20 6f 66 |clear ou|t all of|
|000008e0| 20 44 30 0d 09 09 6d 6f | 76 65 2e 77 09 70 65 6e | D0...mo|ve.w.pen|
|000008f0| 50 74 2e 68 2c 64 30 09 | 09 09 09 3b 20 67 65 74 |Pt.h,d0.|...; get|
|00000900| 20 68 6f 72 69 7a 20 70 | 65 6e 20 6c 6f 63 61 74 | horiz p|en locat|
|00000910| 69 6f 6e 0d 09 09 73 75 | 62 2e 77 09 73 74 61 72 |ion...su|b.w.star|
|00000920| 74 50 74 2e 68 2c 64 30 | 09 09 09 3b 20 73 75 62 |tPt.h,d0|...; sub|
|00000930| 74 72 61 63 74 20 73 74 | 61 72 74 69 6e 67 20 6c |tract st|arting l|
|00000940| 6f 63 61 74 69 6f 6e 0d | 09 09 64 69 76 75 2e 77 |ocation.|..divu.w|
|00000950| 09 74 61 62 57 69 64 74 | 68 2c 64 30 09 09 09 09 |.tabWidt|h,d0....|
|00000960| 3b 20 64 69 76 69 64 65 | 20 62 79 20 74 61 62 20 |; divide| by tab |
|00000970| 77 69 64 74 68 0d 09 09 | 61 64 64 71 2e 77 09 23 |width...|addq.w.#|
|00000980| 31 2c 64 30 09 09 09 09 | 09 3b 20 61 64 64 20 6f |1,d0....|.; add o|
|00000990| 6e 65 20 74 6f 20 74 61 | 62 20 77 69 64 74 68 0d |ne to ta|b width.|
|000009a0| 09 09 6d 75 6c 75 2e 77 | 09 74 61 62 57 69 64 74 |..mulu.w|.tabWidt|
|000009b0| 68 2c 64 30 09 09 09 09 | 3b 20 67 65 74 20 70 69 |h,d0....|; get pi|
|000009c0| 78 65 6c 20 6f 66 66 73 | 65 74 0d 09 09 61 64 64 |xel offs|et...add|
|000009d0| 2e 77 09 73 74 61 72 74 | 50 74 2e 68 2c 64 30 09 |.w.start|Pt.h,d0.|
|000009e0| 09 09 3b 20 61 64 64 20 | 73 74 61 72 74 69 6e 67 |..; add |starting|
|000009f0| 20 6c 6f 63 61 74 69 6f | 6e 0d 09 09 0d 09 09 6d | locatio|n......m|
|00000a00| 6f 76 65 2e 77 09 64 30 | 2c 2d 28 61 37 29 09 09 |ove.w.d0|,-(a7)..|
|00000a10| 09 09 3b 20 70 75 73 68 | 20 68 6f 72 69 7a 20 63 |..; push| horiz c|
|00000a20| 6f 6f 72 64 69 6e 61 74 | 65 0d 09 09 6d 6f 76 65 |oordinat|e...move|
|00000a30| 2e 77 09 70 65 6e 50 74 | 2e 76 2c 2d 28 61 37 29 |.w.penPt|.v,-(a7)|
|00000a40| 09 09 09 3b 20 70 75 73 | 68 20 76 65 72 74 20 63 |...; pus|h vert c|
|00000a50| 6f 6f 72 64 69 6e 61 74 | 65 0d 09 09 5f 4d 6f 76 |oordinat|e..._Mov|
|00000a60| 65 54 6f 09 09 09 09 09 | 09 09 3b 20 6d 6f 76 65 |eTo.....|..; move|
|00000a70| 20 70 65 6e 20 6c 6f 63 | 61 74 69 6f 6e 0d 09 09 | pen loc|ation...|
|00000a80| 0d 09 09 6d 6f 76 65 71 | 09 23 31 2c 64 30 09 09 |...moveq|.#1,d0..|
|00000a90| 09 09 09 3b 20 73 74 69 | 63 6b 20 31 20 69 6e 20 |...; sti|ck 1 in |
|00000aa0| 64 30 20 66 6f 72 20 61 | 20 6c 69 74 74 6c 65 20 |d0 for a| little |
|00000ab0| 65 78 74 72 61 20 73 70 | 65 65 64 0d 09 09 61 64 |extra sp|eed...ad|
|00000ac0| 64 61 2e 77 09 64 30 2c | 74 65 78 74 50 09 09 09 |da.w.d0,|textP...|
|00000ad0| 09 3b 20 62 75 6d 70 20 | 70 74 72 20 74 6f 20 74 |.; bump |ptr to t|
|00000ae0| 65 78 74 0d 09 09 73 75 | 62 2e 77 09 64 30 2c 6e |ext...su|b.w.d0,n|
|00000af0| 75 6d 43 68 61 72 73 09 | 09 09 09 3b 20 73 75 62 |umChars.|...; sub|
|00000b00| 74 72 61 63 74 20 31 20 | 66 72 6f 6d 20 6c 65 6e |tract 1 |from len|
|00000b10| 67 74 68 20 6f 66 20 74 | 65 78 74 0d 09 09 62 72 |gth of t|ext...br|
|00000b20| 61 2e 73 09 40 4c 6f 6f | 70 09 09 09 09 09 3b 20 |a.s.@Loo|p.....; |
|00000b30| 61 6e 64 20 6c 6f 6f 70 | 0d 0d 09 40 44 72 61 77 |and loop|...@Draw|
|00000b40| 54 65 78 74 3a 0d 09 09 | 74 73 74 2e 77 09 69 6e |Text:...|tst.w.in|
|00000b50| 64 65 78 09 09 09 09 09 | 3b 20 61 6e 79 20 74 65 |dex.....|; any te|
|00000b60| 78 74 20 74 6f 20 64 72 | 61 77 3f 0d 09 09 62 65 |xt to dr|aw?...be|
|00000b70| 71 2e 73 09 40 4e 6f 54 | 65 78 74 09 09 09 09 09 |q.s.@NoT|ext.....|
|00000b80| 3b 20 73 6b 69 70 20 69 | 66 20 6e 6f 74 0d 09 09 |; skip i|f not...|
|00000b90| 0d 09 09 6d 6f 76 65 61 | 2e 6c 09 74 65 78 74 50 |...movea|.l.textP|
|00000ba0| 2c 61 30 09 09 09 09 3b | 20 67 65 74 20 70 74 72 |,a0....;| get ptr|
|00000bb0| 20 74 6f 20 6e 65 78 74 | 20 63 68 61 72 61 63 74 | to next| charact|
|00000bc0| 65 72 0d 09 09 73 75 62 | 61 2e 77 09 69 6e 64 65 |er...sub|a.w.inde|
|00000bd0| 78 2c 61 30 09 09 09 09 | 3b 20 73 75 62 74 72 61 |x,a0....|; subtra|
|00000be0| 63 74 20 69 6e 64 65 78 | 0d 09 09 6d 6f 76 65 2e |ct index|...move.|
|00000bf0| 6c 09 61 30 2c 2d 28 61 | 37 29 09 09 09 09 3b 20 |l.a0,-(a|7)....; |
|00000c00| 70 75 73 68 20 70 74 72 | 20 74 6f 20 74 65 78 74 |push ptr| to text|
|00000c10| 0d 09 09 63 6c 72 2e 77 | 09 2d 28 61 37 29 09 09 |...clr.w|.-(a7)..|
|00000c20| 09 09 09 3b 20 70 75 73 | 68 20 6f 66 66 73 65 74 |...; pus|h offset|
|00000c30| 20 69 6e 74 6f 20 74 65 | 78 74 0d 09 09 6d 6f 76 | into te|xt...mov|
|00000c40| 65 2e 77 09 69 6e 64 65 | 78 2c 2d 28 61 37 29 09 |e.w.inde|x,-(a7).|
|00000c50| 09 09 09 3b 20 70 75 73 | 68 20 6c 65 6e 67 74 68 |...; pus|h length|
|00000c60| 20 6f 66 20 74 65 78 74 | 20 74 6f 20 64 72 61 77 | of text| to draw|
|00000c70| 0d 09 09 5f 44 72 61 77 | 54 65 78 74 09 09 09 09 |..._Draw|Text....|
|00000c80| 09 09 3b 20 63 61 6c 6c | 20 44 72 61 77 54 65 78 |..; call| DrawTex|
|00000c90| 74 0d 09 09 0d 09 09 73 | 75 62 2e 77 09 69 6e 64 |t......s|ub.w.ind|
|00000ca0| 65 78 2c 6e 75 6d 43 68 | 61 72 73 09 09 09 3b 20 |ex,numCh|ars...; |
|00000cb0| 73 75 62 74 72 61 63 74 | 20 66 72 6f 6d 20 6c 65 |subtract| from le|
|00000cc0| 6e 67 74 68 20 6f 66 20 | 74 65 78 74 0d 09 09 63 |ngth of |text...c|
|00000cd0| 6c 72 2e 77 09 69 6e 64 | 65 78 09 09 09 09 09 3b |lr.w.ind|ex.....;|
|00000ce0| 20 72 65 73 65 74 20 69 | 6e 64 65 78 20 74 6f 20 | reset i|ndex to |
|00000cf0| 30 0d 09 40 4e 6f 54 65 | 78 74 3a 0d 09 09 72 74 |0..@NoTe|xt:...rt|
|00000d00| 73 0d 09 09 0d 09 40 44 | 6f 6e 65 3a 0d 09 09 62 |s.....@D|one:...b|
|00000d10| 73 72 2e 73 09 40 44 72 | 61 77 54 65 78 74 09 09 |sr.s.@Dr|awText..|
|00000d20| 09 09 3b 20 64 72 61 77 | 20 72 65 73 74 20 6f 66 |..; draw| rest of|
|00000d30| 20 74 65 78 74 0d 09 7d | 0d 7d 0d 0d 0d 2f 2a 2a | text..}|.}.../**|
|00000d40| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000d50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000d60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000d70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000d80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0d 20 41 73 |********|****. As|
|00000d90| 6d 4d 65 61 73 75 72 65 | 54 65 78 74 57 69 64 74 |mMeasure|TextWidt|
|00000da0| 68 73 0d 0d 09 09 41 73 | 73 65 6d 62 6c 79 2d 6c |hs....As|sembly-l|
|00000db0| 61 6e 67 75 61 67 65 20 | 72 6f 75 74 69 6e 65 20 |anguage |routine |
|00000dc0| 75 73 65 64 20 62 79 20 | 43 50 45 64 69 74 54 65 |used by |CPEditTe|
|00000dd0| 78 74 3a 3a 4d 65 61 73 | 75 72 65 54 65 78 74 57 |xt::Meas|ureTextW|
|00000de0| 69 64 74 68 73 2e 0d 20 | 2a 2a 2a 2a 2a 2a 2a 2a |idths.. |********|
|00000df0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000e00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000e10| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000e20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000e30| 2a 2a 2a 2a 2a 2a 2f 0d | 0d 76 6f 69 64 09 41 73 |******/.|.void.As|
|00000e40| 6d 4d 65 61 73 75 72 65 | 54 65 78 74 57 69 64 74 |mMeasure|TextWidt|
|00000e50| 68 73 28 0d 09 72 65 67 | 69 73 74 65 72 20 50 74 |hs(..reg|ister Pt|
|00000e60| 72 09 74 65 78 74 50 2c | 0d 09 72 65 67 69 73 74 |r.textP,|..regist|
|00000e70| 65 72 20 73 68 6f 72 74 | 09 6e 75 6d 43 68 61 72 |er short|.numChar|
|00000e80| 73 2c 0d 09 73 68 6f 72 | 74 09 09 09 74 61 62 57 |s,..shor|t...tabW|
|00000e90| 69 64 74 68 2c 0d 09 72 | 65 67 69 73 74 65 72 20 |idth,..r|egister |
|00000ea0| 50 74 72 09 67 61 70 50 | 2c 0d 09 6c 6f 6e 67 09 |Ptr.gapP|,..long.|
|00000eb0| 09 09 67 61 70 4c 65 6e | 67 74 68 2c 0d 09 72 65 |..gapLen|gth,..re|
|00000ec0| 67 69 73 74 65 72 20 73 | 68 6f 72 74 09 2a 77 69 |gister s|hort.*wi|
|00000ed0| 64 74 68 73 50 2c 0d 09 | 72 65 67 69 73 74 65 72 |dthsP,..|register|
|00000ee0| 20 73 68 6f 72 74 09 6d | 61 78 57 69 64 74 68 29 | short.m|axWidth)|
|00000ef0| 0d 7b 0d 09 72 65 67 69 | 73 74 65 72 20 73 68 6f |.{..regi|ster sho|
|00000f00| 72 74 09 69 6e 64 65 78 | 3b 0d 09 72 65 67 69 73 |rt.index|;..regis|
|00000f10| 74 65 72 20 73 68 6f 72 | 74 09 6c 61 73 74 57 69 |ter shor|t.lastWi|
|00000f20| 64 74 68 3b 0d 09 72 65 | 67 69 73 74 65 72 20 63 |dth;..re|gister c|
|00000f30| 68 61 72 09 74 61 62 3b | 0d 09 09 0d 09 61 73 6d |har.tab;|.....asm|
|00000f40| 20 7b 0d 09 09 63 6c 72 | 2e 77 09 69 6e 64 65 78 | {...clr|.w.index|
|00000f50| 09 09 09 09 09 3b 20 72 | 65 73 65 74 20 69 6e 64 |.....; r|eset ind|
|00000f60| 65 78 0d 09 09 63 6c 72 | 2e 77 09 6c 61 73 74 57 |ex...clr|.w.lastW|
|00000f70| 69 64 74 68 09 09 09 09 | 3b 20 73 65 74 20 6c 61 |idth....|; set la|
|00000f80| 73 74 57 69 64 74 68 20 | 74 6f 20 7a 65 72 6f 0d |stWidth |to zero.|
|00000f90| 09 09 6d 6f 76 65 2e 62 | 09 23 6b 54 61 62 2c 74 |..move.b|.#kTab,t|
|00000fa0| 61 62 09 09 09 09 3b 20 | 6b 65 65 70 20 74 61 62 |ab....; |keep tab|
|00000fb0| 20 63 68 61 72 61 63 74 | 65 72 20 69 6e 20 72 65 | charact|er in re|
|00000fc0| 67 69 73 74 65 72 20 66 | 6f 72 20 73 70 65 65 64 |gister f|or speed|
|00000fd0| 0d 09 09 0d 09 40 4c 6f | 6f 70 3a 0d 09 09 63 6d |.....@Lo|op:...cm|
|00000fe0| 70 2e 77 09 6e 75 6d 43 | 68 61 72 73 2c 69 6e 64 |p.w.numC|hars,ind|
|00000ff0| 65 78 09 09 09 3b 20 68 | 61 76 65 20 77 65 20 6d |ex...; h|ave we m|
|00001000| 65 61 73 75 72 65 64 20 | 61 6c 6c 20 74 68 65 20 |easured |all the |
|00001010| 74 65 78 74 3f 0d 09 09 | 62 67 65 2e 73 09 40 44 |text?...|bge.s.@D|
|00001020| 6f 6e 65 09 09 09 09 09 | 3b 20 62 72 61 6e 63 68 |one.....|; branch|
|00001030| 20 69 66 20 77 65 20 68 | 61 76 65 0d 09 09 63 6d | if we h|ave...cm|
|00001040| 70 61 2e 6c 09 67 61 70 | 50 2c 74 65 78 74 50 09 |pa.l.gap|P,textP.|
|00001050| 09 09 09 3b 20 61 72 65 | 20 77 65 20 61 74 20 74 |...; are| we at t|
|00001060| 68 65 20 67 61 70 3f 0d | 09 09 62 6e 65 2e 73 09 |he gap?.|..bne.s.|
|00001070| 40 4e 6f 74 41 74 47 61 | 70 09 09 09 09 3b 20 62 |@NotAtGa|p....; b|
|00001080| 72 61 6e 63 68 20 69 66 | 20 6e 6f 74 0d 09 09 0d |ranch if| not....|
|00001090| 09 40 41 74 47 61 70 3a | 0d 09 09 62 73 72 2e 73 |.@AtGap:|...bsr.s|
|000010a0| 09 40 4d 65 61 73 54 78 | 74 09 09 09 09 3b 20 65 |.@MeasTx|t....; e|
|000010b0| 6c 73 65 20 6d 65 61 73 | 75 72 65 20 74 68 65 20 |lse meas|ure the |
|000010c0| 74 65 78 74 20 74 6f 20 | 74 68 65 20 6c 65 66 74 |text to |the left|
|000010d0| 20 6f 66 20 74 68 65 20 | 67 61 70 0d 09 09 61 64 | of the |gap...ad|
|000010e0| 64 61 2e 6c 09 67 61 70 | 4c 65 6e 67 74 68 2c 74 |da.l.gap|Length,t|
|000010f0| 65 78 74 50 09 09 09 3b | 20 61 6e 64 20 73 6b 69 |extP...;| and ski|
|00001100| 70 20 6f 76 65 72 20 74 | 68 65 20 67 61 70 0d 09 |p over t|he gap..|
|00001110| 09 0d 09 09 63 6d 70 2e | 77 09 6d 61 78 57 69 64 |....cmp.|w.maxWid|
|00001120| 74 68 2c 6c 61 73 74 57 | 69 64 74 68 09 09 3b 20 |th,lastW|idth..; |
|00001130| 68 61 76 65 20 77 65 20 | 65 78 63 65 65 64 65 64 |have we |exceeded|
|00001140| 20 74 68 65 20 6d 61 78 | 69 6d 75 6d 20 77 69 64 | the max|imum wid|
|00001150| 74 68 3f 0d 09 09 62 67 | 65 2e 73 09 40 4f 76 65 |th?...bg|e.s.@Ove|
|00001160| 72 4d 61 78 57 69 64 74 | 68 09 09 09 3b 20 62 72 |rMaxWidt|h...; br|
|00001170| 61 6e 63 68 20 69 66 20 | 73 6f 0d 09 09 0d 09 40 |anch if |so.....@|
|00001180| 4e 6f 74 41 74 47 61 70 | 3a 0d 09 09 61 64 64 71 |NotAtGap|:...addq|
|00001190| 2e 77 09 23 31 2c 69 6e | 64 65 78 09 09 09 09 3b |.w.#1,in|dex....;|
|000011a0| 20 65 6c 73 65 20 62 75 | 6d 70 20 74 68 65 20 69 | else bu|mp the i|
|000011b0| 6e 64 65 78 09 09 0d 09 | 09 63 6d 70 2e 62 09 28 |ndex....|.cmp.b.(|
|000011c0| 74 65 78 74 50 29 2b 2c | 74 61 62 09 09 09 3b 20 |textP)+,|tab...; |
|000011d0| 69 73 20 63 68 61 72 61 | 63 74 65 72 20 66 72 6f |is chara|cter fro|
|000011e0| 6d 20 74 65 78 74 20 61 | 20 74 61 62 3f 0d 09 09 |m text a| tab?...|
|000011f0| 62 6e 65 2e 73 09 40 4c | 6f 6f 70 09 09 09 09 09 |bne.s.@L|oop.....|
|00001200| 3b 20 6c 6f 6f 70 20 69 | 66 20 6e 6f 74 0d 09 09 |; loop i|f not...|
|00001210| 0d 09 40 49 73 54 61 62 | 3a 0d 09 09 6d 6f 76 65 |..@IsTab|:...move|
|00001220| 71 09 23 31 2c 64 30 09 | 09 09 09 09 3b 20 73 74 |q.#1,d0.|....; st|
|00001230| 69 63 6b 20 31 20 69 6e | 20 64 30 20 66 6f 72 20 |ick 1 in| d0 for |
|00001240| 61 20 6c 69 74 74 6c 65 | 20 65 78 74 72 61 20 73 |a little| extra s|
|00001250| 70 65 65 64 0d 09 09 73 | 75 62 2e 77 09 64 30 2c |peed...s|ub.w.d0,|
|00001260| 74 65 78 74 50 09 09 09 | 09 3b 20 64 65 63 72 65 |textP...|.; decre|
|00001270| 6d 65 6e 74 20 70 74 72 | 20 74 6f 20 74 65 78 74 |ment ptr| to text|
|00001280| 0d 09 09 73 75 62 2e 77 | 09 64 30 2c 69 6e 64 65 |...sub.w|.d0,inde|
|00001290| 78 09 09 09 09 3b 20 64 | 65 63 72 65 6d 65 6e 74 |x....; d|ecrement|
|000012a0| 20 23 20 6f 66 20 63 68 | 61 72 61 63 74 65 72 73 | # of ch|aracters|
|000012b0| 20 74 6f 20 6d 65 61 73 | 75 72 65 0d 09 09 62 73 | to meas|ure...bs|
|000012c0| 72 2e 73 09 40 4d 65 61 | 73 54 78 74 09 09 09 09 |r.s.@Mea|sTxt....|
|000012d0| 3b 20 6d 65 61 73 75 72 | 65 20 74 68 65 20 74 65 |; measur|e the te|
|000012e0| 78 74 20 74 6f 20 74 68 | 65 20 6c 65 66 74 0d 09 |xt to th|e left..|
|000012f0| 09 0d 09 09 63 6d 70 2e | 77 09 6d 61 78 57 69 64 |....cmp.|w.maxWid|
|00001300| 74 68 2c 6c 61 73 74 57 | 69 64 74 68 09 09 3b 20 |th,lastW|idth..; |
|00001310| 68 61 76 65 20 77 65 20 | 65 78 63 65 65 64 65 64 |have we |exceeded|
|00001320| 20 74 68 65 20 6d 61 78 | 69 6d 75 6d 20 77 69 64 | the max|imum wid|
|00001330| 74 68 3f 0d 09 09 62 67 | 65 2e 73 09 40 4f 76 65 |th?...bg|e.s.@Ove|
|00001340| 72 4d 61 78 57 69 64 74 | 68 09 09 09 3b 20 62 72 |rMaxWidt|h...; br|
|00001350| 61 6e 63 68 20 69 66 20 | 73 6f 0d 09 09 0d 09 09 |anch if |so......|
|00001360| 6d 6f 76 65 71 09 23 30 | 2c 64 30 09 09 09 09 09 |moveq.#0|,d0.....|
|00001370| 3b 20 63 6c 65 61 72 20 | 6f 75 74 20 61 6c 6c 20 |; clear |out all |
|00001380| 6f 66 20 64 30 0d 09 09 | 6d 6f 76 65 2e 77 09 6c |of d0...|move.w.l|
|00001390| 61 73 74 57 69 64 74 68 | 2c 64 30 09 09 09 3b 20 |astWidth|,d0...; |
|000013a0| 67 65 74 20 74 6f 74 61 | 6c 20 77 69 64 74 68 20 |get tota|l width |
|000013b0| 6f 66 20 74 65 78 74 20 | 73 6f 20 66 61 72 0d 09 |of text |so far..|
|000013c0| 09 64 69 76 75 2e 77 09 | 74 61 62 57 69 64 74 68 |.divu.w.|tabWidth|
|000013d0| 2c 64 30 09 09 09 09 3b | 20 64 69 76 69 64 65 20 |,d0....;| divide |
|000013e0| 62 79 20 74 61 62 20 77 | 69 64 74 68 0d 09 09 61 |by tab w|idth...a|
|000013f0| 64 64 71 2e 77 09 23 31 | 2c 64 30 09 09 09 09 09 |ddq.w.#1|,d0.....|
|00001400| 3b 20 61 64 64 20 6f 6e | 65 20 74 6f 20 74 61 62 |; add on|e to tab|
|00001410| 20 77 69 64 74 68 0d 09 | 09 6d 75 6c 75 2e 77 09 | width..|.mulu.w.|
|00001420| 74 61 62 57 69 64 74 68 | 2c 64 30 09 09 09 09 3b |tabWidth|,d0....;|
|00001430| 20 63 6f 6d 70 75 74 65 | 20 77 69 64 74 68 20 61 | compute| width a|
|00001440| 74 20 6e 65 78 74 20 74 | 61 62 20 73 74 6f 70 0d |t next t|ab stop.|
|00001450| 09 09 61 64 64 71 2e 77 | 09 23 32 2c 77 69 64 74 |..addq.w|.#2,widt|
|00001460| 68 73 50 09 09 09 09 3b | 20 62 75 6d 70 20 77 69 |hsP....;| bump wi|
|00001470| 64 74 68 73 50 0d 09 09 | 6d 6f 76 65 2e 77 09 64 |dthsP...|move.w.d|
|00001480| 30 2c 28 77 69 64 74 68 | 73 50 29 09 09 09 3b 20 |0,(width|sP)...; |
|00001490| 73 61 76 65 20 77 69 64 | 74 68 20 6f 66 20 74 61 |save wid|th of ta|
|000014a0| 62 20 69 6e 20 77 69 64 | 74 68 73 20 61 72 72 61 |b in wid|ths arra|
|000014b0| 79 0d 09 09 6d 6f 76 65 | 2e 77 09 64 30 2c 6c 61 |y...move|.w.d0,la|
|000014c0| 73 74 57 69 64 74 68 09 | 09 09 3b 20 72 65 6d 65 |stWidth.|..; reme|
|000014d0| 6d 62 65 72 20 6e 65 77 | 20 74 6f 74 61 6c 20 77 |mber new| total w|
|000014e0| 69 64 74 68 0d 09 09 0d | 09 09 6d 6f 76 65 71 09 |idth....|..moveq.|
|000014f0| 23 31 2c 64 30 09 09 09 | 09 09 3b 20 73 74 69 63 |#1,d0...|..; stic|
|00001500| 6b 20 31 20 69 6e 20 64 | 30 20 66 6f 72 20 61 20 |k 1 in d|0 for a |
|00001510| 6c 69 74 74 6c 65 20 65 | 78 74 72 61 20 73 70 65 |little e|xtra spe|
|00001520| 65 64 0d 09 09 61 64 64 | 61 2e 77 09 64 30 2c 74 |ed...add|a.w.d0,t|
|00001530| 65 78 74 50 09 09 09 09 | 3b 20 62 75 6d 70 20 70 |extP....|; bump p|
|00001540| 74 72 20 74 6f 20 74 65 | 78 74 0d 09 09 73 75 62 |tr to te|xt...sub|
|00001550| 2e 77 09 64 30 2c 6e 75 | 6d 43 68 61 72 73 09 09 |.w.d0,nu|mChars..|
|00001560| 09 09 3b 20 64 65 63 72 | 65 6d 65 6e 74 20 6c 65 |..; decr|ement le|
|00001570| 6e 67 74 68 20 6f 66 20 | 74 65 78 74 0d 09 09 62 |ngth of |text...b|
|00001580| 72 61 2e 73 09 40 4c 6f | 6f 70 09 09 09 09 09 3b |ra.s.@Lo|op.....;|
|00001590| 20 61 6e 64 20 6c 6f 6f | 70 0d 09 09 09 0d 09 40 | and loo|p......@|
|000015a0| 4d 65 61 73 54 78 74 3a | 0d 09 09 6d 6f 76 65 2e |MeasTxt:|...move.|
|000015b0| 77 09 69 6e 64 65 78 2c | 2d 28 61 37 29 09 09 09 |w.index,|-(a7)...|
|000015c0| 09 3b 20 70 75 73 68 20 | 6e 75 6d 62 65 72 20 6f |.; push |number o|
|000015d0| 66 20 63 68 61 72 61 63 | 74 65 72 73 20 74 6f 20 |f charac|ters to |
|000015e0| 6d 65 61 73 75 72 65 0d | 09 09 6d 6f 76 65 61 2e |measure.|..movea.|
|000015f0| 6c 09 74 65 78 74 50 2c | 61 30 09 09 09 09 3b 20 |l.textP,|a0....; |
|00001600| 67 65 74 20 70 74 72 20 | 74 6f 20 6e 65 78 74 20 |get ptr |to next |
|00001610| 63 68 61 72 61 63 74 65 | 72 20 69 6e 20 74 65 78 |characte|r in tex|
|00001620| 74 0d 09 09 73 75 62 61 | 2e 77 09 69 6e 64 65 78 |t...suba|.w.index|
|00001630| 2c 61 30 09 09 09 09 3b | 20 73 75 62 74 72 61 63 |,a0....;| subtrac|
|00001640| 74 20 69 6e 64 65 78 0d | 09 09 6d 6f 76 65 2e 6c |t index.|..move.l|
|00001650| 09 61 30 2c 2d 28 61 37 | 29 09 09 09 09 3b 20 70 |.a0,-(a7|)....; p|
|00001660| 75 73 68 20 70 74 72 20 | 74 6f 20 74 65 78 74 20 |ush ptr |to text |
|00001670| 74 6f 20 6d 65 61 73 75 | 72 65 0d 09 09 6d 6f 76 |to measu|re...mov|
|00001680| 65 2e 6c 09 77 69 64 74 | 68 73 50 2c 2d 28 61 37 |e.l.widt|hsP,-(a7|
|00001690| 29 09 09 09 3b 20 70 75 | 73 68 20 70 74 72 20 74 |)...; pu|sh ptr t|
|000016a0| 6f 20 63 75 72 72 65 6e | 74 20 70 6f 73 69 74 69 |o curren|t positi|
|000016b0| 6f 6e 20 69 6e 20 77 69 | 64 74 68 73 20 61 72 72 |on in wi|dths arr|
|000016c0| 61 79 0d 09 09 5f 4d 65 | 61 73 75 72 65 54 65 78 |ay..._Me|asureTex|
|000016d0| 74 09 09 09 09 09 3b 20 | 6d 65 61 73 75 72 65 20 |t.....; |measure |
|000016e0| 74 68 65 20 74 65 78 74 | 0d 09 09 0d 09 09 6d 6f |the text|......mo|
|000016f0| 76 65 2e 77 09 6c 61 73 | 74 57 69 64 74 68 2c 64 |ve.w.las|tWidth,d|
|00001700| 30 09 09 09 3b 20 6b 65 | 65 70 20 6c 61 73 74 57 |0...; ke|ep lastW|
|00001710| 69 64 74 68 20 69 6e 20 | 64 30 0d 09 09 6d 6f 76 |idth in |d0...mov|
|00001720| 65 2e 77 09 69 6e 64 65 | 78 2c 64 31 09 09 09 09 |e.w.inde|x,d1....|
|00001730| 3b 20 6c 6f 6f 70 20 69 | 6e 64 65 78 20 69 6e 20 |; loop i|ndex in |
|00001740| 64 31 0d 09 40 57 69 64 | 74 68 4c 6f 6f 70 3a 0d |d1..@Wid|thLoop:.|
|00001750| 09 09 61 64 64 2e 77 09 | 64 30 2c 28 77 69 64 74 |..add.w.|d0,(widt|
|00001760| 68 73 50 29 2b 09 09 09 | 3b 20 61 64 64 20 6c 61 |hsP)+...|; add la|
|00001770| 73 74 57 69 64 74 68 20 | 74 6f 20 65 6c 65 6d 65 |stWidth |to eleme|
|00001780| 6e 74 20 6f 66 20 77 69 | 64 74 68 73 20 61 72 72 |nt of wi|dths arr|
|00001790| 61 79 0d 09 09 64 62 72 | 61 09 64 31 2c 40 57 69 |ay...dbr|a.d1,@Wi|
|000017a0| 64 74 68 4c 6f 6f 70 09 | 09 09 3b 20 61 6e 64 20 |dthLoop.|..; and |
|000017b0| 6c 6f 6f 70 0d 09 09 0d | 09 09 6d 6f 76 65 2e 77 |loop....|..move.w|
|000017c0| 09 2d 28 77 69 64 74 68 | 73 50 29 2c 6c 61 73 74 |.-(width|sP),last|
|000017d0| 57 69 64 74 68 09 3b 20 | 73 61 76 65 20 77 69 64 |Width.; |save wid|
|000017e0| 74 68 20 6f 66 20 6c 61 | 73 74 20 63 68 61 72 61 |th of la|st chara|
|000017f0| 63 74 65 72 0d 09 09 73 | 75 62 2e 77 09 69 6e 64 |cter...s|ub.w.ind|
|00001800| 65 78 2c 6e 75 6d 43 68 | 61 72 73 09 09 09 3b 20 |ex,numCh|ars...; |
|00001810| 64 65 63 72 65 6d 65 6e | 74 20 6c 65 6e 67 74 68 |decremen|t length|
|00001820| 20 6f 66 20 74 65 78 74 | 0d 09 09 63 6c 72 2e 77 | of text|...clr.w|
|00001830| 09 69 6e 64 65 78 09 09 | 09 09 09 3b 20 72 65 73 |.index..|...; res|
|00001840| 65 74 20 63 68 61 72 61 | 63 74 65 72 20 63 6f 75 |et chara|cter cou|
|00001850| 6e 74 0d 09 09 72 74 73 | 09 09 09 09 09 09 09 09 |nt...rts|........|
|00001860| 3b 20 61 6e 64 20 72 65 | 74 75 72 6e 20 74 6f 20 |; and re|turn to |
|00001870| 63 61 6c 6c 65 72 0d 0d | 09 40 44 6f 6e 65 3a 0d |caller..|.@Done:.|
|00001880| 09 09 62 73 72 2e 73 09 | 40 4d 65 61 73 54 78 74 |..bsr.s.|@MeasTxt|
|00001890| 09 09 09 09 3b 20 6d 65 | 61 73 75 72 65 20 74 68 |....; me|asure th|
|000018a0| 65 20 72 65 73 74 20 6f | 66 20 74 68 65 20 74 65 |e rest o|f the te|
|000018b0| 78 74 0d 0d 09 40 4f 76 | 65 72 4d 61 78 57 69 64 |xt...@Ov|erMaxWid|
|000018c0| 74 68 3a 0d 09 7d 0d 7d | 0d 00 00 00 00 00 00 00 |th:..}.}|........|
|000018d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000018f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001900| 00 00 01 00 00 00 01 4f | 00 00 00 4f 00 00 00 3e |.......O|...O...>|
|00001910| ee ff ec 43 eb 54 27 76 | cd 14 43 eb 00 0a 20 d9 |...C.T'v|..C... .|
|00001920| 30 91 15 42 a7 42 67 3e | b8 09 00 2f 3c 12 6d 63 |0..B.Bg>|.../<.mc|
|00001930| 0e 43 50 45 64 69 74 54 | 65 78 74 2e 61 73 6d 43 |.CPEditT|ext.asmC|
|00001940| 02 00 00 00 50 61 72 74 | 53 49 54 78 00 00 00 00 |....Part|SITx....|
|00001950| 00 00 50 61 72 74 53 49 | 54 78 00 00 00 00 00 00 |..PartSI|Tx......|
|00001960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001970| 00 00 a9 80 17 60 00 00 | 00 00 00 00 01 8d 4f 28 |.....`..|......O(|
|00001980| 74 27 76 cd 32 57 94 01 | aa 14 57 cd 01 aa 15 77 |t'v.2W..|..W....w|
|00001990| c4 14 4e 5e 2e 9f 4e 75 | 4e 56 4b 60 8c 4d 23 01 |..N^..Nu|NVK`.M#.|
|000019a0| 67 20 24 25 01 aa 14 24 | 26 02 aa 15 4a ac 2e ec |g $%...$|&...J...|
|000019b0| 2c 5d 02 ff 9e aa 60 11 | 28 5f 33 11 fe d2 5c 02 |,]....`.|(_3...\.|
|000019c0| 03 18 2c 2e 54 57 35 01 | a8 74 11 2f 06 11 a8 73 |..,.TW5.|.t./...s|
|000019d0| 36 11 3f 2e 75 57 11 fe | f6 57 13 fe f2 48 6e ff |6.?.uW..|.W...Hn.|
|000019e0| f8 12 a9 8d 4a 6e 39 01 | 57 c0 13 0c 6e 00 80 fe |....Jn9.|W...n...|
|000019f0| f6 02 57 c1 80 01 80 01 | 01 5e 2a 1d 4d 44 45 46 |..W.....|.^*.MDEF|
|00001a00| 00 00 00 1f 01 20 80 00 | 00 00 03 31 2e 32 14 31 |..... ..|...1.2.1|
|00001a10| 2e 32 20 d1 20 33 20 4f | 63 74 6f 62 65 72 20 31 |.2 . 3 O|ctober 1|
|00001a20| 39 39 33 00 00 00 28 01 | 20 80 00 00 00 03 31 2e |993...(.| .....1.|
|00001a30| 32 1d a9 20 31 39 39 33 | 20 43 68 72 69 73 74 6f |2.. 1993| Christo|
|00001a40| 70 68 65 72 20 52 2e 20 | 57 79 73 6f 63 6b 69 00 |pher R. |Wysocki.|
|00001a50| 00 01 00 00 00 01 4f 00 | 00 00 4f 00 00 00 3e 00 |......O.|..O...>.|
|00001a60| b8 22 88 0f cc 00 00 00 | 1c 00 3e 00 00 76 65 72 |."......|..>..ver|
|00001a70| 73 00 01 00 0a 00 01 ff | ff 00 00 00 00 00 00 00 |s.......|........|
|00001a80| 00 00 02 ff ff 00 00 00 | 23 00 00 00 00 00 00 00 |........|#.......|
|00001a90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001aa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ab0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ac0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+